home *** CD-ROM | disk | FTP | other *** search
/ Hyper Stacks 1994 May / Hyper Stacks (Pacific HiTech)(1994)[Mac].iso / Small Apps / Grayline Clock / stack_-1.xml < prev   
Encoding:
Extensible Markup Language  |  1994-04-30  |  4.6 KB  |  46 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in</name>
  5.     <id>-1</id>
  6.     <cardCount>22</cardCount>
  7.     <cardID>3321</cardID>
  8.     <listID>4523</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>512</width>
  14.         <height>342</height>
  15.     </cardSize>
  16.     <script>‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû Script info for stack ‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àûHANDLERS:-- closeStack, openStackFUNCTIONS:-- DaysBetweenDates, UTCdate, UTCtimeSTATS: 1639 chars, 68 lines, 7/4/91, 8:43 AM‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àû‚àûon openStackglobal utcOffsetput cd fld offsetHours of cd setUTC into utcOffsetput hilite of btn "bypassMe" of cd "menu" into tempif temp = falsethengo cd "menu"elsewait 1 secsvisual dissolvego cd "world map"end ifend openStackon closeStackglobal compFlag, selectedcountrylock screenpush cdput true into compflaggo cd "World Map"click at loc of bg btn "clear" of cd "World Map"click at loc of btn "chooseMap" of cd "World Map"pop cdunlock screenput false into compFlagput "" into selectedcountryend closeStackfunction UTCtimeglobal utcOffset, hrMinput the secs into nowput the date into todayconvert today to secssubtract today from nowput now into ttimesubtract utcOffset * 3600 from ttimeconvert ttime to short timeif word 2 of ttime = "AM" or word 2 of ttime = "PM" thenif char 1 to 2 of ttime = "12" then put "00" into char 1 to 2 of ttimeend ifif word 2 of ttime = "PM" thenput offset(":",ttime) - 1 into hrMinput char 1 to hrMin of ttime into tempdelete char 1 to hrMin of ttimeadd 12 to tempput temp before ttimedelete word 2 of ttimeend ifif word 2 of ttime = "AM" then delete word 2 of ttimereturn ttimeend UTCtimefunction UTCdateglobal utcOffsetget the timeput it into tdateconvert tdate to secssubtract utcOffset * 3600 from tdateconvert tdate to short datereturn tdateend UTCdatefunction DaysBetweenDates startDate, endDateconvert startDate to secsconvert endDate to secsreturn ((endDate - startDate)/(60*60*24))end daysBetweenDates</script>
  17.     <background id="2799" file="background_2799.xml" name="" />
  18.     <background id="2955" file="background_2955.xml" name="" />
  19.     <background id="5501" file="background_5501.xml" name="" />
  20.     <background id="11054" file="background_11054.xml" name="" />
  21.     <background id="15124" file="background_15124.xml" name="Demographics" />
  22.     <background id="18471" file="background_18471.xml" name="SchedulePage" />
  23.     <card id="3321" file="card_3321.xml" marked="false" name="menu" owner="2955" />
  24.     <card id="6655" file="card_6655.xml" marked="false" name="World Map" owner="5501" />
  25.     <card id="17872" file="card_17872.xml" marked="false" name="setUTC" owner="18471" />
  26.     <card id="7608" file="card_7608.xml" marked="false" name="Oceania" owner="2799" />
  27.     <card id="15945" file="card_15945.xml" marked="false" name="Australia" owner="15124" />
  28.     <card id="29639" file="card_29639.xml" marked="false" name="Fiji" owner="15124" />
  29.     <card id="35123" file="card_35123.xml" marked="false" name="Indonesia" owner="15124" />
  30.     <card id="63270" file="card_63270.xml" marked="false" name="New Caledonia" owner="15124" />
  31.     <card id="46081" file="card_46081.xml" marked="false" name="New Zealand" owner="15124" />
  32.     <card id="48469" file="card_48469.xml" marked="false" name="Papua New Guinea" owner="15124" />
  33.     <card id="60317" file="card_60317.xml" marked="false" name="Vanuatu" owner="15124" />
  34.     <card id="14014" file="card_14014.xml" marked="false" name="About" owner="11054" />
  35.     <card id="3712" file="card_3712.xml" marked="false" name="SQLCapture" owner="11054" />
  36.     <card id="3945" file="card_3945.xml" marked="false" name="SQLCapture" owner="11054" />
  37.     <card id="12254" file="card_12254.xml" marked="false" name="SQLCapture" owner="11054" />
  38.     <card id="12450" file="card_12450.xml" marked="false" name="SQLCapture" owner="11054" />
  39.     <card id="12688" file="card_12688.xml" marked="false" name="AboutRR" owner="11054" />
  40.     <card id="13132" file="card_13132.xml" marked="false" name="" owner="11054" />
  41.     <card id="12909" file="card_12909.xml" marked="false" name="SQLCapture" owner="11054" />
  42.     <card id="8249" file="card_8249.xml" marked="false" name="Order" owner="11054" />
  43.     <card id="9043" file="card_9043.xml" marked="false" name="SQLCapture" owner="11054" />
  44.     <card id="9338" file="card_9338.xml" marked="false" name="ad" owner="11054" />
  45. </stack>
  46.